home *** CD-ROM | disk | FTP | other *** search
- ReadArchive "statics.vib"
-
- Declare white_cornell = Shader [ PlainSurface [ Color '1.0,1.0,1.0' Kd 0.75 ] ]
-
- Declare green_cornell = Shader [ PlainSurface [ Color '0.15,0.5,0.15' Kd 0.75 ] ]
-
- Declare red_cornell = Shader [ PlainSurface [ Color '0.64,0.15,0.1' Kd 0.75 ] ]
-
- static light_color = '1.0,0.9,0.7'
-
- Declare alight = Shader [ PlainSurface [ Color light_color*2.0 Ka 1.0 Kd 0.0 ] ]
-